home *** CD-ROM | disk | FTP | other *** search
/ Pascal Super Library / Pascal Super Library (CW International)(1997).bin / TURB_VIS / ALEXLEVI / DEMO / DEMO_PRN.PAS < prev    next >
Pascal/Delphi Source File  |  1994-04-12  |  4KB  |  96 lines
  1.  
  2. (*
  3.  
  4. *****************************************************************************
  5. *                                                                           *
  6. *      This font was made by Alex Levitas' "Epson FX-80 Font Editor".       *
  7. *                                                                           *
  8. *****************************************************************************
  9.  
  10.  Copy this array to the printer to change printer draft font.
  11.  
  12.                            W A R N I N G ! ! !
  13.  This ISN'T code. It DOES NOT check printer existence or state. It's ONLY
  14.  data that must be copied to printer to change printer font ! !
  15.  
  16.  To use this array in your program insert the directive
  17.  
  18.     {$I DEMO_PRN.PAS}
  19.  
  20.  If you want to use more than one changed font in your program, you
  21.  must change array name in each source file.
  22.  
  23. *)
  24.  
  25. const
  26.  
  27.   EpsonFont: Array [1..668] of Byte =
  28.    (
  29.  
  30.      27, 64,
  31.      27,120,  0,
  32.      27, 54,
  33.      27, 58,  0,  0,  0,
  34.  
  35.      27, 38,  0, 46, 46,
  36.     132,  3,  0,  3,  0,  0,  0,  0,  0,  0,  0,  0,
  37.      27, 38,  0, 65, 90,
  38.     139,  0,  1,  6, 73,144, 40,192, 62, 65, 62,  1,
  39.     139,  0,145,110,129,126,129,  0,145,110,145,110,
  40.     139,  0, 60, 66,188, 67,148,  9,240,  1,226,  4,
  41.     139,  0,145,110,129,126,129,  0,129,124,  2, 60,
  42.     139,  0,145,110,129,126,129, 16,129, 16,129, 66,
  43.     139,  0,145,110,129,126,128, 16,128, 16,128, 64,
  44.     139,  0, 60, 66,188, 67,136, 17,232,  1,202,  4,
  45.     139,  0,145,110,129,126,128, 16,129, 94,  1, 78,
  46.     139,  0, 65, 16,129,126,129,126,128,  0,128,  0,
  47.     139,  0,  6, 72,129, 16,129,126,129,126,128,  0,
  48.     139,  0,145,110,129,126,128, 20,129, 86,  9, 82,
  49.     139,  0,145,110,129,126,129,  0,129, 64,  1,  2,
  50.     139,  0,145,110,129,126,129, 16,239, 16,128,127,
  51.     139,  0,145,110,129,112, 12, 48, 14,129,126,129,
  52.     139,  0, 60, 66,188, 67,136, 17,224,  1,226, 28,
  53.     139,  0,145,110,129,126,129, 16,129,114,  0, 96,
  54.     139,  0, 60, 66,188, 67,128, 21,226,  0,226, 29,
  55.     139,  0,145,110,129,126,128, 16,142,113, 14, 97,
  56.     139,  0,100,146, 97,144,  1,144,  9,150, 73,  6,
  57.     139,  0, 72,148, 34,220, 35,192,  1,128,  1,130,
  58.     139,  0,145,110,  1,126,  1,  0,  1,126,  0,  1,
  59.     139,  0,145,110,  1,126,  1,  0,  2, 60,  0, 64,
  60.     139,  0,145,110,129,126,  1, 16,239, 16,  1,254,
  61.     139,  0,129, 64,167, 88, 36, 26,229,  2,129,  0,
  62.     139,128,120,131,120,  1,  8,129,112,137,118,  0,
  63.     139,  0, 65,130,  1,148,  9,144, 33,144, 65,134,
  64.      27, 38,  0, 97,122,
  65.     139,  0,  2,  0, 46,  0, 41,  0, 30,  0,  2,  0,
  66.     139,  0,130,  0,254,  0, 33,  0, 30,  0,  2,  0,
  67.     137,  0, 18,  0, 30,  0, 33,  0, 18,  0,  0,  0,
  68.     139,  0,  2,  0, 30,  0,161,  0,254,  0,  2,  0,
  69.     139,  0, 18,  0, 30,  0, 41,  0, 26,  0, 16,  0,
  70.     136,  0,  2,  0,127,128, 18,128,  0,  0,  0,  0,
  71.      11,  0, 36,  0, 61,  0, 69,  0, 61,  2, 32,  0,
  72.     139,  0,130,  0,255,  0, 32,  0, 31,  0,  2,  0,
  73.     135,  0,  2,  0, 47,  0,  2,  0,  0,  0,  0,  0,
  74.       8,  0, 17,  0, 89,  0, 21,  2,  0,  0,  0,  0,
  75.     139,  0,130,  0,255,  0, 40,  0, 23,  0,  2,  0,
  76.     135,  0, 66,  0,255,  0, 66,  0,  0,  0,  0,  0,
  77.     139,  0, 32, 31, 32,  0, 63,  0, 32, 31, 32,  2,
  78.     139,  0, 34,  0, 63,  0, 32,  0, 31,  0,  2,  0,
  79.     139,  0, 18,  0, 30,  0, 33,  0, 30,  0, 18,  0,
  80.      11,  0, 36,  0, 63,  0, 68,  0, 60,  0, 36,  0,
  81.      11,  0, 36,  0, 60,  0, 68,  0, 63,  0, 37,  0,
  82.     138,  0, 18,  0, 31,  0, 18,  0, 16,  8,  0,  0,
  83.      11,  0, 17, 42,  0, 42,  0, 42,  0, 42, 68,  0,
  84.     138,  0, 34,  0,127,  0, 34,  0,  2,  4,  0,  0,
  85.     139,  0, 18,  0, 63,  0,  1,  0, 63,  0, 18,  0,
  86.     138,  0, 18,  0, 63,  0,  1,  0, 30, 32,  0,  0,
  87.     139,  0, 34, 28, 34,  0,  2, 60,  2,  0, 34, 28,
  88.     139,  0, 32,  2, 32,  4, 16,  8, 20,  2, 32,  2,
  89.      11,  0, 69,  0,125,  0,  5,  0,125,  2, 64,  0,
  90.     139,  0, 18, 36,  2, 40,  2, 40,  2, 40, 18, 36,
  91.  
  92.      27, 37,  1,  0,
  93.       7
  94.  
  95.    );
  96.